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TRICKY TUTORIAL #3 
PAGE FLIPPING 

by Robin Sherer 

c Educational Software Inc. 1982 


How to Load 


TAPE.... 

Place the tape In your recorder, label side UP* Make 
sure the tape Is rewound, and reset the counter to zero. 
Push PLAY on the recorder, type CLOAD and press RETUR 
twice. If the program won»t start to LOAD, try P° S J+ 1 Jjj 
the tape forward or backwards a little. A I [++l« J r 
find the beginning Is to first, turn your volume UP. Then 
POKE 54018.52 to star* s the cassette motor. Listen 
™ise" on the tape. When you find the high-pitched steady 
tone, you have the beginning of the program. P0KE 5401 8 r 
to turn the cassette motor off. You can now LOAD the 
program as shown above. When the READY Prompt aPP«ars, typ 
RUN and press RETURN. We recommend you write down the numb 
on your recorder's counter as each program starts, this 
make It easier to find each part later on. 


DISK.... 

To load and run the disk, first turn on your disk drive. 
When the busy light goes out, place the disk In th 
Nor turn oHhe ?omp2ter. with the BASIC Cartridge n place 
and the program will load each part and run by Itself. 


Requirements: 

16K Tape / 24K Disk 
ATARI BASIC Cartridge 


Return any defective tapes or disks to: 

Educational Software 
4565 Cherryvale Ave. 

SoqueI, CA. 95073 

ATARI Is a registered trademark of ATARI Inc. 
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I n+roduc+Ion 


No doubt some of you hesitated before ordering a program 
to "flip pages". For this reason I want to start by assuring 
& you t-ipat., ojice ypuJ @arn. e i ther of the two simple methods 
c tauglitz' jwBre ,), yodr^p r oj^ains^ % 1L I ah d: feUN mufcft 6 n I per. 


had 

■■ u> 


¥d D< i 


earn the rtfet hod of 


... ’ - a.ne'fc- l c e. 

Not v e r y . L o n cj~ a g o, J 

f I l pp l ng screens'. Since I v st ff I ^temember 'how cd'nf^U#! ng It 
was at first, only the material you need Is presented here. 
A few details have been left out because only those trying 
to become experts will care, and they will have to read the 
technical manuals anyway. The style of this manual Is 
Informal mostly because I have never heard a good 
explanation for Instructions written In a cold manner. We 
bought our computers to learn and have funl. 



■■■-lA V *!>»+ 

* ■■11 .4 ^' •. -: x 

Th» • I dee- I pp 1 ng; pa 

home cpmputers., Yo 
able to do page fpfpp^dg. Th 
ATARI a'LLo*s ^tlywH^TSPLA 
stored. I n a.iiyL.fre'e 
small 


tself hTTO^I ta y 
especially Important for us to iea¥n 
computers offer so many types of graph! 
special capability means that you can store 
for numerous pages (TV screens) of graphics 
then later. In your program, go to any 
Instantly. This makes your programs I 
profess IonaI. 


l hlsp-Is 
Co the ATAR I 
cs modes. This 
the Information 
and/or text and 
of these pages 
ook much more 


- Basics - 

First, we are going to cover some basics. Memory Is 
stored In something called RAM, which stands for random 
access memory. This Is because you can either read or write 
to any place within It. Usually discussion of memory Is In 
terms of bytes. For example, your memory(RAM) may consist of 
16K,24K,32K,40K, or 48K bytes. Remember that IK Is actually 
1024 bytes. Confused? GOOD I Then you may appreciate the fact 
that to flip screens of data we are going to just move down 
In memory by Increments of 256 bytes at a time. These 
Increments are called "pages" (ain't life simple???). So 4 
pages Is 4*256 = 1024 bytes = IK . The last sentence Is all 
you have to remember. Four pages of memory = 1K bytes of 
memory. Oh yes, I should tell you that "K" Is the symbol for 
1000 . 
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O ? \ * 



TJje t©F m ,Ftltp I ng peges" has no_w become can f u s I n g -we 
are NOT f I I pp I ng 256 bytes at v a 11 m<Er. For th l^ reason we 
will refer to- the, process af ^flipping screens or 
d I sp l ays,-!,e,, the stuff you see on the; TV screen at any one 
time. r .. - __ ' " 



There will be two methods shown In our examples. DON’T 
JUST VIEW THEM. COPY THEM TO ANOTHER DISK OR TAPE AND MODIFY 
THEM FOR YOUR OWN USE. WE WANT YOU TO COPY OUR SOFTWARE FOR 
USE IN YOUR OWN PROGRAMS. EACH EXAMPLE IS SET UP FOR GENERAL 
PURPOSES, SO JUST SUBSTITUTE YOUR OWN TEXT OR GRAPHICS. IF 
YOU HAVE 32K OR MORE OF MEMORY, CHANGE TO HIGH RES, GRAPHICS 
MODE 8 AND ADD TEXT AS WELL AS GRAPHICS. The method and 
examples all work, but could be much better....especI a I Iy If 
written for more memory than the small amount this lesson 
runs on (don’t brag about your 48K machine. My ATARI has 
160KI) 
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Normal1y 
units) to the 
data area j 
simply tel Is 
"memory aln * 
set up a new 
In memory", 
memory space 
data to be 
points to the 
will show you 


__ ± 

3 JRWAX3 

when you say Graphics 
computer, 
ust below 


ft ‘Wets' °up sap 
fh_e Hof e <£f ? fodr 

SUH.SL — c ** m rf'+ < 


the computer after ’a^ first 
t where it used -but 

(additional) Display List an 
By doing this as often 
allows), you allow a number 
seen by just redirecting th 
start of each Display List, 
thls graph!caI Iy: 


8 (11 for newer 

Drhsp l.ay S L.and a 
vtfteiwoiryr -MetHpd one 
?screen , Is - drawn, 
111»s now - lower,^ so 
d data area 'lower 
as you requIre (and 
of screens full of 
e one location that 
EASY! Figure ;-one 


TOP OF MEMORY- , - . 


■ ——— 'V<. . : 

SCREEN DATA 1' < 261 : to 7900 bytea,) ' . 

j : 

d 

. 

D 1 SPLAY L I Sf: (25_ v tp, .2C2, \ 

=* -V>50K3K 0 J6.REEN C©AT^i 3?y r 15 OH ! 

>v ' : t.i • "*•" i .<* <*"• 

DISPLAY LIST 2 

SCREEN DATA 3 

DISPLAY LIST 3 

AS MANY MORE SCREENS AS YOU HAVE ROOM FOR. 


YOUR BASIC PROGRAM and OTHER STUFF. 



BOTTOM OF MEMORY 
Fig. 1 
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30 I'.'iHT- 

EXAMPLE 1 

A -7 ; 1C * , H * -* fH ,. k « , k ... 

RUN Ex amp I e oHotilce t-h^t ; ^oa c^n see? i;t draw out some 
random I i nes, e then -they ^d.l^appsar-arid a new set of lines Is 
drawn out; Then...these two screens. Sf4m to appear and 
disappear, first one then another. *' 

Here's how ft works: = 


c re Exampiel 

1 0 GRAPH ICS-6 
12 GOSUB 4000 
15 TRAP 20 

20 COLOR 1:FOR 1=1 TO 20:C0L0R 2*RND(4):DRAWTO 140*RND(4),70 
*RND(9):NEXT I 

25 ? "THIS IS FLIPPING BETWEEN TWO AREAS OF MEMORY. PRESS 

RETURN TO COATINUE." --- 

30 A=PEEK(106) < , . 

40 DLISTL1“PEEK(560):DLISTH1=PEEK< 561) 

50 POKE 106,A-32_ 

60 GRAPHICS 6 * .- -- 

61 GOSUB 4000 . . „ , 

70 DL I STL2=PEEK (560 ) :DL rSTH2“PE 1 EK ( 561 )- 1 
75 TRAP 80 ■ y v 

80 COLOR 1 : F0R"T=T~T0~2OTCOtORH2*fWD lAXiDRAMZQ 1 40*RND ( 4), 70 
*RND(9):NEXT I 

85 ? "THIS IS FLIPPING BETWEEN TWO^AREAS OF MEMORY. PRESS 
RETURN TO CONTINUE." 

86 POKE 764,255 

90 POKE 561,DLISTH1:FOR W=1 TO 2:NEXT W:P0KE 561,DLISTH2:IF 
PEEK(764)=12 THEN 110 
100 GOTO 90 

110 POKE 106,A:RUN "D : NEXT1" 

4000 X=PEEK(16):IF X=128 THEN 4020 
4010 POKE 16,X-128:POKE 53774,X-128 
4020 RETURN 


Lines 10 to 25 draw a screen just like normal using COLOR, 
PLOT, and PRINT commands (See your BASIC reference manual 
for these commands). 

Line 30 stores the original top of memory (In number of 256 
byte pages) read from location 106 using the PEEK command. 

% 

Line 40 stores the two numbers that locate the Display List. 
Remember that it takes two eight bit numbers to address all 
of the computers memory. The LOW part can hold from 0 to 255 
ana the HIGH part holds from 0 to 255 (times 256)...again 
see your manual or our MASTER MEMORY MAP. We will only use 
the part of the address In location 561. This is because we 
are moving memory down in whole page increments and 561 
holds the number of whole pages. We left in the low part. In 
case you want to experiment with your own ideas. 
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- Note ** 

Often I leave out pieces of «?#^#at you ?+ Y a « n +°h + er S 1t 
mentioned In the manual. You should assume that It e, +|) er '* 
something you will see the need= f-qr 7 j£+£r * ° r •: s 9 ^®+ h { n g 
needed just to make all the examples run .together smoothly. 

Line 50 says "the top of memory l.s located down'In RAM 
by 32 pages (8K bytes) from the preylous value. Thls Is more 
than Is needed for this example. The extra amount wiIlallow 
you room to add more screens later when you come back to 
this example to experiment with your own changes.... and you 
will come back, won’t you? 

Line 60 to 85 again draw some graphics just like normal. 
The computer looks at location 106 and sees the value we put 
there It Is thus "fooled" into placing the new Display List 
Inadati starting 32 pages lower than It otherwise wou 
have. Actually,the amount of pages you go d °" "•*!*£ ' 

correspond to the amount of memory the graph I cs 
are using requires. Look In the first page of +he BASIC 
Manual’s Graphics section to see how much you n ^d. ^ used 
mode 6 so 2k or 8 pages would have been enough. Thls ^way, 
though; we ief? rooS for you to easily copy this program and 

substltuTe your own graphics! 


t x e t 


7 s: ti 


v"omsm 


Line 16 °s+6fh# hodat-Iiaii»eoibr.ad4rt^s 1 2 o,t, 

Display 6 LIst. You can do this before (like here line 70) Or 
after the graphics statements. The location will be used to 
flip the screens later. 

Line 90 then does the flipping by PO + E i72 n ?»L 

the address (high part on Iy!) of the fIrst DI splay List 

then the second, then the first, etc. Th s says ^use th 
Display List..no this one...no use the first..eTc. . 

Another Note... 

You can see in the program code in Example 11 It is line 
110 that POKES 106 back to the original value. If you ar 
aolnq to go on and use your computer after confusing It I ke 
this? Jou 9 had better tell it what the real top <> memory is. 
If on the other hand, you are going to turn It off af 
our program is finished, don’t bother. Any time you power P 
lr ? Ve£ RESET, the computer will store the correct value In 

106. 

Also, while running our program, don't press RESET or 
BREAK unless It crashes (It shoulyn t, but...). Y 

example stops then press RESET and type RUN and press 
RETURN. Of course, you should press RESET 
experiment with each example after you have seen the entire 
program at least once. This is how you will learn! 
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; ^ example 2 

Thts examp fe Is. made put^of Example 1 to show you how +0 
expand The basic Idea of changing screens. Here we set up 
FOUK Display Lists and print four simple messages on the 
screen. As you press a button' the message appears Instantly! 
If you think about It, you will realize that there Is no 
difference In flipping between four one line messages on a 
page, or four completely filled pages of text. Each time you 
press a button, another area of memory Is displayed on the 
screen. The one line messages were just to keep the program 
simple for you to study. Please add many more lines of text 
to tnis example and see what we mean. You just put more 
words between the quotes In lines 20, 70, 110, & 150. 

Lines-10 to 40 write text and store the needed values 
for DIsp1 ay LIst one (DL1). 

h 3 * '*• - 

Lines 50 to 80 POKEs 106 down 8 pages (2K, more than 
enough for GR.0), writes more text, and stores these 
new values. 

Lines 90 to 120 same thing another 8 pages down In 
memory, but different text. 

L l iie| 130 to 160 same th i ng :aga i n s f.o»r a-fourTh screen I 

Lines 168 to 185 look for you to press keys 1 to 4 Cor 
whateverl) so that lines 190 to 220 can tell the computer 
which of the four Display Lists you previously created to 
now use. The test for CH = 12 Is to see If you decided to go 
on to something else by pressing return. The POKE of 255 to 
764 clears the location that holds the Internal code for the 
last key pressed. The variable CH on line 170 will tell the 
system which key you just pressed (If any). 

NOTE 

You can put In your own text or have the computer read 
In the text from the keyboard or disk and place the first 
960 bytes (the size of GR.0) In page one, the next 960 In 
page 2, etc. The way to read In data from keyboard or disk 
Is explained In your reference manuals. 


5 TRAP 10 Examp Ie2 

10 GRAPHICS 0 

20 POSITION 4,10:? "THIS IS PAGE IMPOSITION 2,20:? "PRESS 
1,2,3 OR 4 FOR THAT PAGE." 

25 ? "PRESS RETURN TO CONTINUE." 

30 A*PEEK(106) 
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40 DLL 1“PEEK(560): DLH 1“PEEK(561 ) 

45 REM ****************************** 

50 POKE 106 , A-8 « 

60 GRAPHICS 0 - „ " 

70 POSITION 10,10:? "THIS IS PAGE 2. :P 
1,2,3 OR 4 FOR THAT PAGE." 

75 ? "PRESS RETURN TO CONTINUE." 

80 DLL2=PEEK(560):DLH2=PEEK(561) 

85 REM ****************************** 

90 POKE 1 06,A-1 6 
100 GRAPHICS 0 

110 POSITION 15,10:? "THIS IS PAGE 3. : 

1,2,3 OR 4 FOR THAT PAGE." 

115 ? "PRESS RETURN TO CONTINUE." 

120 DLL3“PEEK(560):DLH3=PEEK(561) 

125 REM ***************************** 
130 POKE 1 06 , A-24 

140 GRAPHICS 0 ^ , H 

150 POSITION 20,10:? "THIS IS PAGE 4. 

1,2,3 OR 4 FOR THAT PAGE." 

155 ? "PRESS RETURN TO CONTINUE." 

160 DLL4=PEEK(560):DLH4*PEEK(561 ) 

165 REM ***************************** 
168 POKE 764,255:GOSUB 4000 - 

170 CH=PEEK (764) > L - 

180 IF CH*31 THEN 190 

181 IF CH=3Q THEN 200 

182 IF CH=26 THEN 210 

183 IF CH“24 THEN 220 

184 IF CH“12 THEN 230 

185 GOTO 170 . 

190 POKE 560,DLL1:POKE 561,DLH1:GOTO 1 
200 POKE 560,DLL2:P0KE 561,DLH2 :GOTO 1 
210 POKE 560 ,DLL3 :POKE 561,DLH3:GOTO 1 
220 POKE 560,DLL4:POKE 561,DLH4:GOTO 1 
230 POKE 106,A:RUN "D : NEXT2" 

4000 X=»PEEK( 16) : IF X=128 THEN 4020 
4010 POKE 16,X-128:POKE 53774,X-128 
4020 RETURN 


POSITION 2,20:? "PRESS 


{POSITION 2,20:? "PRESS 


{POSITION 2,20:? "PRESS 


?> C 
, £ 6 * 


f c f 

V n Wv $ < 

' r GA T 
f 


283$*" 

e;f,se 

' y33° z 
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EXAMPLE 3 


Example 3 Is the same as Example 2, but with graphics 
• +*v+ Althouah It will seem obvious to some of 

vou all you neea to do Is substitute graphics type commands 
for* the text commands of Example 2. We used four simp e ba 
araDhs but you could draw very complicated pictures If y 
wanted* Remelber that the material that you place on a 
screen doesn't effect the basic method we are using. Even If 
veu fill up the screen, the computer just keeps looking at 
the Display List to see where to get It's screen data. No 
more watching complicated pictures drawn out every time you 
need them. Now you can store them ahead of time In memory. 


Exanple3 


"THE 

ON." 


5,34 


YEARS 1981 


"THE 

ON." 


YEARS 1981 


5 TRAP TO 

10 POLOr'^PLOT 5,5 :DRAWT0 5,35:DRAWT0 75,35 

COLOR 2:PLOT 10,34:DRAWT0 10,25:DRAWT0 5,25:POSITI ON 

:POKE 765,2:XI0 18,#6,0,0,"S:" 

? "PRESS 1,2,3, OR 4 FOR BAR GRAPHS OF":? 

1982,1983 OR 1984.":? "PRESS RETURN TO GO 

A=PEEK (106) r rr r * \ 

DLL1“PEEK(560):DLH1“PEEK(561) 

REM ****************************** 

POKE 106,A-8 

GRAPHICS 5 _ 

Pm or 1*PL0T 5.5:DRAWTO 5,35:DRAWT0 75,35 _ 

COLOR 3:PLOT 15,34:DRAWT0 15,20:DRAWT0 10,20:POSITI ON 10, 

34:POKE 765,3:XI0 18,#6,0,0,"S : " 

? "PRESS 1,2,3, OR 4 FOR BAR GRAPHS OF :? 

1982,1983 OR 1984.":?'"PRESS RETURN TO GO 
DLL2=PEEK(560):DLH2“PEEK(561 ) 

REM ****************************** 

POKE 106,A-16 

GRAPHICS 5 „ __ 

nm no i-PIOT 5 5*DRAWT0 5.35:DRAWT0 75*35 
COLOR 1 ’:PL0T 20,34 :DRAWT0 20,15:DRAWT0 1 5,1 5 : POS ITI ON 

34 : POKE 765,1 :X!0 18,#6,0,0,"S:" 

? "PRESS 1,2,3, OR 4 FOR BAR GRAPHS OF":? 

1982,1983 OR 1984.":? "PRESS RETURN TO GO 
DLL3“PEEK(560):DLH3“PEEK(561) 

REM ***************************** 

POKE 106 , A-24 
GRAPHICS 5 

IZn 2: PLOT 25>34*:0RAW T 0 # 25 I^O^DRAWTO* 20,1 0:POS IT, ON 20. 

"PRESS 7 ^2^3^' Or' 4 # FOR°BAF|”SrAPHS 0F-,» "THE TEARS 1981 
1982,1983 OR 1984.":? "PRESS RETURN TO GO ON. 

160 DLL4 = PEEK(560):DLH4“PEEK(561 ) 


15 

20 

25 

30 

40 

45 

50 

60 

65 

70 

75 


80 

85 

90 

100 

105 

110 


115 

120 
125 
130 
1 40 
145 
150 

1 55 


"THE 

ON." 


15, 


YEARS 1981 


- 9 - 


165 REM a**************************** 

168 POKE 764,255:GOSUB 4000 
170 CH*PEEK(764) 

180 IF CH = 31 THEN 190 

181 IF CH = 30 THEN 200 

182 IF CH SS 26 THEN 210 

183 IF CH=24 THEN 220 

184 IF CH®12 THEN 230 

185 GOTO 170 

190 POKE 560,DLL 1:POKE 561,DLH1:GOTO 170 
200 POKE 560,DLL2:POKE 561,DLH2:GOTO 170 
210 POKE 560,DLL3:POKE 561,DLH3:GOTO 170 
220 POKE 560,DLL4 : POKE 561,DLH4:GOTO 170 
230 POKE 106,A : RUN "D:NEXT3" 

4000 X=PEEK(16):IF X=128 THEN 4020 
4010 POKE 16,X-128:POKE 53774,X-128 
4020 RETURN 






EXAMPLE 4 


This example draws a shape on each page. T h ® n, + h* + 
flloDlna screens you can animate the shape! Remember + ha 
Ini si? o?da?a can be used for the shape so why not copy 
this program to your disk/cassette and try your own shapes. 
Another°?dea would be to draw a business logo and move It 
across a chart of profits. Use your Imaglnat on, or just 
play If you like. The possibilities are endless. 


ExanpIe4 


3 GRAPHICS 0 
5 TRAP 10 
10 GRAPHICS 5 
15 COLOR 1 

20 READ X,Y sIF X = 0 THEN 30 

27 DATA 9^23^?0^23^11.23.9.24.10,24^11.24^10,25^8,26.9.26. 

29 DATA 7,35,8,35,9,35,13,35,14,35,15,35,0,0,0 

30 A*PEEK(106) 

35 ? « HUP!” 

40 DLL1*PEEK(560):DLH1“PEEK(561) 

45 REM ***************************** 

50 POKE 106,A-8 
60 GRAPHICS 5 
63 COLOR 1:REST0RE 77 
65 ? " TWO I" 

70 READ X,Y:IF X=0 THEN 80 

D^^I^°0.212U23. 1 9,24.20 24 2, 24 20 25 .8 26.19. 

80 DLL2=PEEK(560):DLH2=PEEK(561 ) 

85 rem1******************* # * ##### *-** 

90 POKE 106,A-16 
100 GRAPHICS 5 
103 ? " THREE!" 

105 COLOR 1 :REST0RE 117 
110 READ X,Y : IF X = 0 THEN 120 

m KS S:S:T5!SM!%...24.10 24 1, 24 10 23 8.26.9.26. 

10,26,11,26,12,26,7,27,9,27,10,27,11,27,13,Z7 

119 DATA 7,35,8,35,9,35,13,35,14,35,15,35,0,0,0 

120 DLL3=PEEK(560):DLH3*PEEK(561 ) 



125 REM ***************************** 

130 POKE 106,A-24 
140 GRAPHICS 5 
143 ? " FOUR!" 

145 COLOR 1sRESTORE 157 
150 READ X,Y:IF X=0 THEN 160 

if, .24.2..23... 

, 5 a »?! &&&'£ £ ft 2 ’a !£lil a &W 2 ,. 2 .., 9 . 

30 20 30.21,30.19,31>21,31,19,32,21,32,18,33,22,33 

159 DATA 18,34,22,34,18,35,19,35,20,35,22,35,23,35,24,35, , 

160 DLL4 S =PEEK (560) :DLH4=PEEK(561 ) 

165 REM ***************************** 

168 POKE 764,255 
170 CH S PEEK(764) 

180 IF CH*31 THEN 190 

181 IF CH=30 THEN 200 

182 IF CH=26 THEN 210 

183 IF CH»24 THEN 220 

184 IF CH=12 THEN 230 

185 GOTO 170 _ 

190 POKE 560,DLL1:POKE 561,DLH1:GOTO 170 
200 POKE 560,DLL2 :POKE 561,DLH2:GOTO 170 
210 POKE 560,DLL3 : POKE 561,DLH3:GOTO 170 
220 POKE 560,DLL4 :POKE 561,DLH4:GOTO 170 
230 POKE 106,A:RUN "D:NEXT4" 


EXAMPLE 5 


Notice line 7 which stores the value held ,n mem ° r !Y 

location 559. Then line 13 POKES 559 » 1 t h * ' 0 ! 

neat trick turns off the screen so that the pictures ar 

drawn without your seeing them. It a ' s ° w^nt to 

computer by about 30* depending on graph cs mode. Want to 
know wny? Send us $40. and we..., oh well, I M tell you. 
LocatI on 559 controls the ANTIC Chip which P u+ s the video on 
the screen. Use the original value, stored In "NON to turn 
It on. Use 0 to turn It off. Line 169 Is where we turn fh 

display back on. 


THIS WORKS FOR ANY PROGRAM I 
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Examp Ie5 


5 TRAP 10 
7 N0N=PEEK(559) 

10 GRAPHICS 5 
13 POKE 559,0 
15 COLOR 1 

20 READ X,Y:IF X=0 THEN 30 
25 PLOT X,Y:GOTO 20 

27 DATA 9,23,10,23,11,23,9,24,10,24,11,24,10,25,8,26,9,26, 

10.26.11.26.12.26.7.27.9.27.10.27.11.27.13.27 

28 DATA 6,28,9,28,10,28,11,28,14,28,9,29,10,29,11,29,9,30, 
10,30,11,30,9,31,11,31,8,32,12,32,7,33,13,33,7,34,13,34 

29 DATA 7,35,8,35,9,35,13,35,14,35,15,35,0,0,0 

30 A=PEEK(106) 

35 ? " HUP!" 

40 DLL1=PEEK(560):DLH1=PEEK(561 ) 

45 REM ****************************** 

50 POKE 106,A-8 
60 GRAPHICS 5 

62 POKE 559,0 

63 COLOR 1:RESTORE 77 

65 ? " TWO!" 

70 READ X,Y:IF X=0 THEN 80 
75 PLOT X,Y:GOTO 70 

77 DATA 19,23,20,23,21,23,19,24,20,24,21,24,20,25,18,26,19, 

26.20.26.21.26.22.26.17.27.19.27.20.27.21.27.23.27 

7 8 .DATA 17,28, 19,28,20,28,21,28,23,28,19,29,20,29,21,29,19, 
30,20,30,21,30,19,31,21,31,19,32,21,32,18,33,22,33 

79 DATA 18,34,22,34,18,35,19,35,20,35,22,35,23,35,24,35,0,0 

80 DLL2=PEEK(560) :DLH2 SS PEEK(561 ) 

85 REM ****************************** 

90 POKE 106,A-16 
100 GRAPHICS 5 
102 POKE 559,0 
103?" THREE!" 

105 COLOR 1iRESTORE 117 
110 READ X,Y:IF X=0 THEN 120 
115 PLOT X+20,Y:GOTO 110 

117 DATA 9,23,10,23,11,23,9,24,10,24,11,24,10,25,8,26,9,26, 

10,26,11,26,12,26,7,27,9,27,10,27,11,27,13,27 

118 DATA 6,28,9,28,10,28,11,28,14,28,9,29,10,29,11,29,9,30, 
10,30,11,30,9,31,11,31,8,32,12,32,7,33,13,33,7,34,13,34 

119 DATA 7,35,8,35,9,35,13,35,14,35,15,35,0,0,0 

120 DLL3=PEEK(560) :DLH3 = PEEK(561) 

125 REM ***************************** 
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130 POKE 106,A-24 
140 GRAPHICS 5 

142 POKE 559,0 

143 ? " FOUR!" 

145 COLOR 1:RESTORE 157 
150 READ X,Y:IF X=0 THEN 160 
155 PLOT X+20,Y:GOTO 150 

157 DATA 19,23,20,23,21,23,19,24,20,24,21,24,20,25,18,26,19, 
26,20,26,21,26,22,26,17,27,19,27,20,27,21,27,23,27 

158 DATA 17,28,19,28,20,28,21,28,23,28,19,29,20,29,21,29,19, 
30,20,30,21,30,19,31,21,31,19,32,21,32,18,33,22,33 

159 DATA 18,34,22,34,18,35,19,35,20,35,22,35,23,35,24,35,0,0 

160 DLL4-PEEK(560):DLH4 = PEEK(561 ) 

165 REM ***************************** 

168 POKE 764,255 

169 POKE 559,NON 

170 CH*PEEK(764) 

180 IF CH=31 THEN 190 

181 IF CH*30 THEN 200 

182 IF CH-26 THEN 210 

183 IF CH=24 THEN 220 

184 IF CH*12 THEN 230 

185 GOTO 170 

190 POKE 560,DLL1:POKE 561,DLH1:GOTO 170 
200 POKE 560,DLL2:POKE 561,DLH2:GOTO 170 
210 POKE 560,DLL3:POKE 561,DLH3:GOTO 170 
220 POKE 560,DLL4:POKE 561,DLH4:GOTO 170 
230 POKE 106,A:RUN "D:NEXT5" 


METHOD 2 

This method differs only slightly from the first, but 
allows you more control of what goes on. The examples will 
explain the differences. 


EXAMPLE 6 

Instead of using a variable called "A", we use "P106" to 
store the original # of pages In your memory. This will be 
more meaningful to us. P106 stands for the value to POKE 
Into location 106. 


ExanpIe6 

4 P106=PEEK(106) 

5 ? "t":? "AT PAGE ONEl":? "PRESS 1 OR 2 FOR THAT PAGE." 
7 ? "PRESS RETURN TO GO ON." 



10 DP=PEEK(560)+PEEK(561)*256 
12 POKE 16,64 

15 SAV S PEEK(DP+5) 

16 POKE 106,P106-4:POKE 89,SAV-4 

17 ? "AT PAGE TWO!":? "PRESS 1 OR 2 FOR THAT PAGE.":? "PRESS 
RETURN TO G'O ON." 

30 POKE 764,255:TRAP 80 
33 CH=PEEK(764) 

35 IF CH=31 THEN 45 

36 IF CH=12 THEN 60 

37 IF CH=30 THEN 40 

38 GOTO 33 

40 POKE DP+5,SAV-4 
43 GOTO 33 
45 POKE DP+5,SAV 
55 GOTO 33 

60 POKE 106,P106:RUN "D:NEXT6" 


Line 10 stores the location of the start of the DL as 
one decimal number-. Line 15 stores the number we are after. 
It comes 5 bytes after the start of the DL, so we PEEK at 
DL+5, le. It Is the sixth number In the DL. 

Line 16 POKEs memory location 106 down by a number of 
pages (4 In this case). This line also stores a new value we 
need: location 89. This one Is a copy of the value In DP+5 
which tells the system where the start of the display data 
Is. The computer looks at the DL whenever a GRAPHICS command 
Is used, and stores that value here so that It will know 
where the start of your data Is. After a Graphics call, we 
are free to change this number (In 89) to "fool" the 
computer Into doing what we want. After POKEIng both of 
these locations down far enough, we now write some text to 
the new area of memory on line 17. This could be done many 
times If you have enough RAM. 

Now wnen lines 30 to 38 choose which screen you want, lines 
40 or 45 just change the value In the first Display List 
that controls where the first DL gets It's data from. We 
don't care about a second (or 3rd or 4th...) Display List as 
In Examp Ie 1. 


SO WHAT? 

Well, now by just changing one value at the start of the 
flrsT Display Llst+5 (DP+5), you can tell the system to go 
display different data from all over memory. This change 
could be easily controlled with a joystick as we do In our 
Scrolling Program, Tricky Tutorial #2. 

Also, you might want to look at one screen while you are 
drawing several others; for example while a decision was 
being made about options on the first. 
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EXAMPLE 7 


This does what we just suggested. You can not only look 
at two screens (press 0 for screen 1 and 4 for screen two), 
but by Inputting other positive numbers you can look down in 
memory. By Inputting negative numbers, you look up In memory 
until you reach the top. The stuff you see on the screen 
will be tne alpha-numeric equivalent of the BASIC program, 
your screen data, the Operating System or whatever you are 
looking at. The only changes to this program are: 


L i nes 

20 

L i ne 

35 

L i ne 

40 


& 33 Input a number. 

tests that number to see if It is too big 

redirects the DL as before, but with your 
Instead of the previous fixed value of 4. 


va I ue 


Exaapie7 

4 PI06=PEEK(106) 

5 ? "t":? "AT PAGE ONEI":? "PRESS START AND RETURN AT THE 
SAME TIME TO GO ON.":? "PRESS BETWEEN 0 AND ";P106-5; 

7 ? " TO LOOK AT MEMORY IN 1/4 PAGE SCREEN INCREMENTS.":? 

"THEN PRESS RETURN. REPEAT AS DESIRED." 

10 DP=PEEK(560)+PEEK(561 )*256 
12 POKE 16,64 

15 SAV=PEEK(DP+5) 

16 POKE 106,PI06-4:POKE 89,SAV-4 

17 ? "AT PAGE TWO!":? " PRESS START AND RETURN AT THE SAME 
TIME TO GO ON" 

20 DIM A(2) 

25 POKE 53279,8 . 

30 TRAP 30:Z=PEEK(53279):IF Z=6 THEN 80 
33 INPUT A 

35 IF AXP106) THEN 60 
40 POKE DP+5,SAV-A 
55 GOTO 30 

60 ? "NUMBER TOO LARGE, MUST BE LESS THAN";P106-5:? "WE ARE 
NOW AT 4 PAGES DOWN IN MEMORY" 

65 POKE DP+5,SAV-4:P0KE 89,SAV-4 
70 GOTO 30 

80 TRAP 40000:POKE 106,P106:POKE 89,SAV:POKE DP+5,SAV:RUN 
"D:NEXT7" 
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EXAMPLE 8 


The last example Is exactly the same as Example 7, 
except It looks at memory using a colorful graphics 
viewpoint of the data there. Be sure to try negative numbers 
on the last two examples also. Since the program Is designed 
to look up or down In memory, the negative numbers look down 
while the positives look higher in RAM. You can look most 
anywhere from within the BASIC Cartridge to the data flowing 
in and out of the Operating System (try large negative 
numbers for this)...See if you can find an area that is 
changing for real special effects. 


Examp Ie8 

4 PI06 a PEEK(106) 

5 GRAPHICS 5:C0L0R 1:PL0T 10,10:DRAWTO 10,20:DRAWT0 40,20: 
DRAWTO 40,10:DRAWTO 10,10 

10 DP1=PEEK(560)+PEEK(561)*256 
12 POKE 16,64 

15 SAV1=PEEK(DP1+5) 

16 POKE 106,P106-8 

17 GRAPHICS 5:COLOR 2:PL0T 20,20:DRAWT0 20,30:DRAWT0 30,30: 
DRAWTO 30,20:DRAWTO 20,20 

20 DIM A(2) 

21 DP2 SS PEEK ( 560 )+PEEK ( 56 1 )*256 

22 SAV2 3 PEEK(DP2+5) 

25 POKE 53279,8 

27 ? "PRESS START AND RETURN TOGETHER TO GO ON." 

30 TRAP 30:Z 3 PEEK(53279):IF Z»6 THEN 80 
33 INPUT A 

35 IF AXP106) THEN 60 

40 REM POKE DPI+5,SAV-A 

41 POKE DP2+5,SAV1-A 
55 GOTO 30 

60 ? "NUMBER TOO LARGE, MUST BE LESS THAN";P106-5:? "WE ARE 
NOW AT 4 PAGES DOWN IN MEMORY." 

65 POKE DP+5,SAV-4:P0KE 89,SAV-4 
70 GOTO 30 

80 TRAP 40000:POKE 106,P106:POKE 89,SAV:P0KE DP+5,SAV:RUN 
"D: NEXT8" 


THAT'S IT 

Just take any of our examples and try to modify them so 
that you can both understand the methods and make your 
programs look and run much cleaner. I hope you find many new 
uses for PAGE FLIPPING. Please write and tell me about your 
accomplishments using techniques in TRICKY TUTORIALS. BYE I! 
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